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graphics dump from MEGAF ONT 


News and Reviews 
by Mike Dunn, Co-Editor 

Because of a need for a really professional word-processor, | 
recently bought WordStar for my CP/M equipped ATR 8000. To make it 
easier to use, | bought a WYSE 50 terminal with a built-in WordStar 
ROM. This is the most fantastic piece of equipment | have ever used. 
The screen display is unbelievably clear and easy to read; it displays in 
either 80 or 136 columns. The keyboard is perfect, and it has 61 labeled 
. function keys for use with WordStar, as well as 13 unlabeled ones. All 
the function keys can be re-programmed to work as you wish, and a 
25th status line can put labels for some of them on the screen. This 
terminal makes WordStar a breeze to use, and | recommend it to 
anyone who needs a professional level very intelligent terminal for use 
with their ATR-8000. The terminal retails for about $699 plus $100 for 
the WordStar ROM. However, | think | bought all this equipment a little 
too soon, because | just received the new Letter Perfect. 


Letter Perfect Version 6 
(L.J.K., 7852 Big Bend Blvd., St. Louis, MO 63119, $99) 


This is a major update of what | have always considered the most 
powerful of Word Processors for the Atari. The first major change is 
the documentation is first-rate — the one major fault with L.J.K. 
products in the past. The next thing you will notice is the 
documentation begins with instructions on how to back up your disk! 
L.J.K. has never copy-protected programs, saving lots of money which 
has been put into a fairly continuous update policy. They have been 
around a long time and seem to be making money, so! quess they feel 
it’s not a problem for them. Your LP comes unconfigured — once the 
disk is configured, it will boot in fully configured, but can easily be 
changed at any time. You boot in your new Copy, and have a choice of 
40 column display, or 80 columns with either the BIT-3 or Austin- 
Franklin boards. (| understand Austin-Franklin is no longer in 
business). You than have several menus to choose the defaults you 
want, such as the drives, single or double density and the the printer 
menu. You have a built in choice or the Centronics, Prowriter, Epson, 
Qume, NEC, and Okidata printers, as well as the ability to make your 
own custom printer drivers. There is also an option to make dot-space 
character tables for Proportional Print!! It's easy to do and clearly 
explained. After all your options have been chosen, they will boot in 
that way each time until you change it. 

The program is still menu driven as is the old LP, but you can use 
the first letter of the Menu option instead of using the cursor, if you 
wish. 

When you are editing, you have many more commands to use. New 
cursor movement commands include the ability to advance a 
paragraph, go word left and word right and jump to a marker. You can 
delete the left or right words or have many different delete options — 
all proceed by K for "Kill" such as delete all before or after cursor, up 
to marker, and to end of paragraph. You can change the width of the 
screen, use conditional page breaks, imbed printer commands, etc. 

There is an easy to use, powerful database merge ability, and, if this 
is not enough, a built-in, integrated spelling checker!!! This spelling 
checker is not only very fast and easy to use, it is integrated with the 
editor, so your words are flagged in the word processor, and you are 
given a list of possible words to use instead of your mis-spelled word. 
Just pick the number from the word menu, or type in the word you 
want. This is all done in memory, so you do not load in a new program, 
nor do you load in the text file — it is all there. You cannot add words 
to the dictionary, but can use Spell Perfect for that purpose. 

There are many other features | have not mentioned, such as an 
increase in the speed of all the functions working, and the functions 
LP already had made it very powerful to begin with. It will do almost 
anything my new WYSE/WordStar can, except for the wonderful 
display screen and the function keys, for about $1000 cheaper!! An 
exceptionally fine product, except it still uses the non-standard LP file 
format, so you need another program to use Atari files. 

L.J.K. also sent me a new version of their Data Perfect version 2.02. | 
have not had time to really go through it well, but the documentation 
has improved greatly, from the almost incomprehensible to excellent. 


MegaFont 
(Xlent Software, POB 5228, Springfield, VA 22150, $20) 

This easy to use program allows you to dump converted character 
sets to a Epson, Prowriter or Nec printer. It comes with several fonts 
you can use, or you can use your own as made by various font editors. 
You can also list the special character to your printing of listings. In 
the last few months, we have been using PrintWiz, but this month we 
will use MegaFont. The titles of the listing will also be done by this 
program; remember these are reduced in size by the printer. See what 
you think. 


New Atari Magazines 

We have received samples of two new Atari magazines. Both are 
excellent and are for the intermediate to advanced users. ROM 
Magazine (Box 252, Maple Ridge, B.C. V2X 7G1 Canada $12 year) has 
an arcade style machine language game with each issue. The other, 
The U.K. Atari Computer Club Newsletter (POB 3, Rayleigh, Essex, 
U.K. 5 Pounds Sterling for 4 issues) is an absolute delight!! Beautifully 
done, it is as nice a magazine as you could want. Put out by the largest 
U.K. User groups by members, it is a very professional work of love. 
Speaking of Newsletters, the May 1984 issue of Milatari Newsletter 
Box 1191, Waukesha, Wi 53187-1191 has a 16 page article by Eric 
Hanson on 3-D Graphics with an extensive program, including a 
printer dump for a AlphaCom 42 printer. Eric did this for a High School 
programming contest and won first place. The article and extensively 
documented program listing is first rate. | spoke to the editor, and he 
will send ACE Members a reprint for $2, or a disk with the program and 
the article on it for $5. Very much worth it — the program is long, So 
send for the disk version, unless you really like to type, then print it out 
and study the listing — you will learn a lot. 


Getting On-Line: A guide to Accessing Computer Information Services 
(Prentice-Hall, Englewood, NJ 07632 $15) 


Another very nice book from the Prentice-Hall people, this 306 page 
guide has everything you need to know to access databases such as 
CompuServe, Dialog, etc. It covers hardware and software for the Atari 
as well as many other computers, interfacing the RS-232 ports, and a 
comprehensive guide to various databases, including prices, features, 
ease of use, hints, etc. Nicely done, comprehensive and easy to read, 
as are most of the books from this company. 


MPP-1150 Parallel Printer Interface 
(MicroBits, 225 W. 3rd, Albany, OR 97321 $99) 


In the April issue of ACE, we reviewed a number of printer interfaces 
to use instead of the difficult to get Atari 850. It comes in a nice blue 
small box with a 34” I/O cable to connect to your Atari serial port 
(where disk drives, cassettes, etc. are connected) and a 34" ribbon 
cable with a standard Centronics style connector on the end. You 
simply connect the UO cable to your computer, the ribbon cable to 
your parallel printer, and your disk drive, etc., to the I/O connector on 
the interface. No power supply is needed. Optional items include a 4K 
buffer and a serial printer adaptor. It works fine with no fuss, and is 
compatible with all Atari Software. There are no switches or anything 
to set up. A very nice unit from our good friends at MicroBits, to go 
along with their excellent modem. Incidentally, they are also now 
shipping a memory expansion unit for the Atari 600XL. 


This issue and Club News 

This issue features a really fantastic education game written in 
ACTION! by Stan Ockers which needs to be seen to be believed. The 
scrolling and graphics are superb. Because of the use of PM graphics, 
our printer dumps by PrintWiz do not show it all. The Source code for 
those of you who have ACTION! is now available on our brand-new 
ACTION! Disk 42, also featuring the ACTION! programs in the 
Newsletter since ACTION! Disk #1, as well as a number of Utilities 
and demos by Clint Parker (the Author of ACTION!), and some other 
unpublished ACTION! programs. These disks are $15 each, or $20 for 
a double sided disk for both. The next "Best of ACE 49" and the next 
educational disk will also have this program in “run-time” format for 
those of you who do not have ACTION! A must program for those of 
you teaching the Alphabet. These disks should be ready in a month 
Or SO. 


The next meeting of ACE will feature a demonstration of the 
fabulous new MindSet computer. Designed by a team of former Atari 
people who helped design the Atari, it features an 80186 chip for high 
speed, excellent graphics, animation and features similar to the Atari 
ANTIC chip. It also runs almost all IPM-PC software including Lotus 
1-2-3. We will show a demo program of the forthcoming game by 
Synapse designed for the MindSet called Viper. This computer is 
considerably less costly than the IBM-PC or similar computers, and 
has many more features. 


You might recall we reported a rumor last year about North 
American Phillips buying Atari. Well, we were apparently only half 
correct on that one. Larry Gold, our Vice-President, has learned North 
American Phillips (the large, Dutch-owned electronics company) has 
bought 49$.0f Atari from Warner Communications. This is exciting 
news, as the infusion of talent, money and electronics expertise 
indicated by this news is sure to work to the benefit of Atari users and 
the market as a whole. 


BUMPAS REVIEWS 


SEVEN CITIES OF GOLD (Electronic Arts, $40) is designed by the 
same folks (Ozark Softscape) who designed M.U.L.E. This is a real- 
time graphic adventure game for one player. You begin the game in the 
Spanish Court where you are given a grant of gold with which to equip 
your first voyage. You may buy ships, men, food, and trade goods at 
the Outfitter's store. All play action uses the joystick. 

The town (Cadiz?) demonstrates some very advanced 3D graphic 
effects. As you walk down the street, the buildings in the foreground 
scroll past you faster than those in the background. In the Pub you 
may save any game in progress (one to a disk). In your Home you may 
view all the maps you've drawn, total your gold accumulations and 
review the percentage of land, rivers, natives and special geographic 
features you've discovered. When you step aboard the ship, the 
program places you west of the Canary Is. You now have less than 50 
years to open up the New World! 

As you sail west across the Atlantic, you will notice your food 
disappearing. This is your real-time clock. One point of food goes for 
each passing week. You may encounter storms on the voyage, and up 
to half your food may spoil at any time. The screen shows an 8x8 map 
with your player symbol in the center. Around the map the screen 
displays the number of ships, men, gold, goods and food you're 
carrying. When at sea, a depth guage tells you “deep”, “medium” or 
"shallow". If it reads “deep”, you're not near land. 

At any point in the game, the trigger will bring up a menu. With this 
you may view a larger map which will show water everywhere except 
where you have already discovered land. When on land, this menu also 
permits you to unload or pick up times, to trade, or to make gifts. One 
option also will “amaze” the natives. Pushing the trigger and pointing 
the joystick at the same time permits changes in speed. 

In the New World you will find native civilizations and gold as well 
as all the geographical wonders. You may build Forts and you may 
make converts among the natives who may invite you to build 
Missions. Natives have 3 things you need: Food, gold, and bearers to 
carry things. Bearers will carry 10 times as much as Spaniards. Beares 
will also lead you to gold mines or capital cities. Occasionally bearers 
runs off, leaving you with more than you can carry. Your touch is fatal 
to natives. If you kill too many of them, they will attack you and kill 
your men. You might be able to make amends for accidents with gifts. 

You must return to Spain to record the progress of each voyage. If 
you don't make it back, someone else in your family will apply to the 
King for another grant of gold to equip a new expedition. The game 
may be played at Novice, Journeyman, or Master leverls. A Novice will 
be aimed at land upon setting forth in ships, and all villages and cities 
will appear on the screen as you approach them. At higher levels, 
villages and cities are invisible. You must stop and look for the lights 
of their fires. Also the bearers may try to lead you astray in your search 
for gold. Storms at sea may sink ships and blow you off course. 
Shallows may also sink ships of a more experienced player. 

As you discover more of the New World a pleased monarch will 
reward you with promotions until you've attained the highest honor: 
Viceroy. Once you discover the historical New World, the game also 
provides a program to generate. a number of semi-random alternate 
New Worlds to discover. This program requires 10 minutes to 
complete the work. The authors have included a plate tectonics model 
for the geography and a cultural diffusion model to distribute the 
population. Seven Cities of Gold shows us some very advanced 
coding and great play value. I'm sure it will be an award-winner and 
may even surpass M.U.L.E. in popularity. Keep up the good work, 
Ozark Softscape! 

Boxing fans might have a lot of fun with TITLEBOUT (Avalon Hill, 
$30). For one or two players, you may choose from among 500 or so 
boxers from all weight classes. This game is one of Avalon Hill's 
"Sports Illustrated" games. You might be familiar with their board 
game of the same title. This mostly text game is nearly a direct 
rendition of that game for the Atari. 

You can answer all the "what if" questions you desire. Can Jack 
Johnson beat Muhammad Ali? (I tried 4 times, losing three and 
drawing one). You can even mix weight classes. The program also has 
room for you to create your own (imaginary) boxers, or to add new 
boxers who appear on the scene in the future. The program tracks 
nearly 3 dozen characteristics of the boxers in order to execute each 
round of a fight. The stats for these characteristics have been 
(subjectively) determined by the designers of the game, but you'll 
probably find they are pretty accurate. If you disagree, well you can 
add your own "Jack Johnson" (for instance) with modified 
characteristics. l 

Written in BASIC, there are some graphics showing two boxers in 
the ring with a referee. They punch when the program scores hits, they 
clinch, they get knocked down. A text window shows wise-cracks by 
the boxers, along with descriptions of the punches being scored. All 
boxers do the "Ali shuffle". 

Players select the boxers to use, and before each round, you may 
select from among approximately 30 strategies to use. There is no 
"arcade" action, or player control during a round. The computer takes 
over at the bell. With this game, you may create all the "dream 
matches" you might desire. 

— Jim Bumpas 


PACK IT and CHAIN IT 


by George Schwenk (c) 1984 by SUPERware, 2028 Kingshouse RD., 
Silver Spring MD 20904 


Description: Atari BASIC utilities. Requirements: disk drive, Atari 
BASIC, 32K RAM for PACK IT, 16K RAM for CHAIN IT. Cost: $20 each. 
Recently, an acquaintance and | were discussing some problems 
encountered in converting an Apple program to the Atari. The program 
in question requires the use of two machine language routines — one 
to compact saved picture files and the other to chain together the 
several portions making up the complete program. My friend 
wondered how to write the routines. Did | have a surprise for him! 

Just a couple of days before, Jim Bumpas had asked me to review 
two new programs by George Schwenk, whose previous works include 
EASY and XBASIC (See April and May 1984 ACE Newsletters for 
reviews). Mr. Schwenk's new programs, PACK IT and CHAIN IT, are 
precisely what my friend needs. 

To test PACK IT, I put the disk in my drive and turned on my 800 
(with no cartridge inserted). In a few seconds, | was asked to type in 
the name of the data file | wished to pack, so I inserted the graphics 
disk we recently received from the Jacksonville Florida ACE and typed 
“D:STARWARS”. The data file was then loaded into the computer and 
| was told it contained 7,684 bytes. After giving a name for the packed 
file, it was saved on the disk and | was told the new file contained only 
2,058 bytes! | then loaded in DOS to compare the files on the disk. To 
my surprise, whereas the original file required 62 sectors of storage 
space, the new file needed only 17. 

Not every file will pack so nicely, however; the GATOR file on the 
same graphics demo disk, which started also with 7,684 bytes, packed 
only to 5,652 bytes and required 46 sectors to save. Mr. Schwenk 
warns some data files may even be larger when packed than before, 
depending on the complexity of the data. Nonetheless, packing can 
easily increase the storage space on a disk. 

To use the packed files, you simply add to your basic program a 
short machine language routine which is initialized from lines 
29300-29310. The routine allows you to choose one of three options. 
The first is to unpack from RAM after loading the packed file into a 
buffer. The second option loads a file to RAM, but performs no 
unpacking. This option can be used to move any data file, such as a 
character set. The final option unpacks from the disk file as it loads 
directly into a chosen area of RAM. PACK IT works extremely fast and 
will satisfy anyone needing this feature. 

CHAIN IT does just what the name implies. It allows you to save 
certain variables which can be passed on to other segments of a long 
program. It does not use page six, so there should be no conflicts with 
machine language routines you might have stored there. Instead, it 
uses locations on page zero beginning at $D4. All you have to do is 
ENTER a machine language subroutine into all the segments of your 
BASIC program, GOSUB to it first before starting a subprogram and 
again just prior to LOADing the next. 

Both of these programs are easy to use. The documentation is 
short, but the examples should be clear enough even for beginners. I 
can easily recommend them to anyone needing these routines. 

— DeLoy Graham 


FLASHING NUMBERS 


by Chris Simeral, 54 E. White Terrace, Nutley, NJ 07110 


Have you ever wished you could read as fast as those people you 
see in those speed-reading commercials? Well, Flashing Numbers 
may not make you a speed reader, but it will improve your reading 
speed. 

What this program does is to train your eyes to look very quickly at 
something and remember it. It does this by flashing a six digit number 
on the TV screen for a fraction of a second and then asking you to type 
in what it was. This really works! 

Not long ago, a professional hockey goalie was having trouble 
blocking shots. He saw a doctor and the doctor told him his eyes may 
not be fast enough to watch the puck all the way to make the save. He 
started him on a training plan using a projector to flash numbers on a 
screen. After a few weeks of doing this for half an hour a day, he went 
back to his goalie position and his saves improved by 30%! 

When | heard this, | immediately set to work designing a program to 
do something similar to what that machine in the doctor's training pro- 
gram did. After a few trials and errors, | came up with this program. | 
have been using it for about a month now and have found it really has 
made my reading much faster. Let's wait until baseball season and 
see what it will do for my hitting. The program also keeps track of the 
number of consecutive right and how many right answers were given 
for the number of attempts. 

As your eyes become quicker, the program may become too easy, to 
make it harder just change the 60 in line 40 to a lower number or add 
another 9 to the set of nines in line 20 and add another 1 to the set of 
ones in line 30. 


TYPE-AHEAD 


One thing which will improve the already great Atari screen editor is 
a "type-ahead". It’s a gizmo letting you type something in while the 
computer is busy, then enters is when the computer wants input. This 
can be useful during LISTing or LOADing a program. Sound tough? 

No problem. All we need to do is modify the screen editor to set a 
flag when it’s ready for input. Then we need a VBI routine to check for 
key presses, and store them. The VBI will also send the characters 
when the computer is ready. 

When typing in the BASIC loader program, be sure to get the data 
right and SAVE it. When RUN, the program will generate an 
AUTORUN.SYS file with the type-ahead on it. Now re-boot the Atari, 
and the type-ahead will load and run. To test it, enter this line when the 
READY prompt appears: FOR G = 0 TO 1 STEP O:NEXT G. While this 
one-liner is running in circles, type in anything you want. Then hit 
BREAK. What you typed will now come up onto the screen. Note you 
can use all the screen editing functions with this program. 

NOTES: 

The type-ahead uses ALL of Page 6 for the main program, and uses 
the cassette buffer to hold the key presses. This doesn't mean you 
can't use the cassette, just don't press any keys while you load or save 
with the cassette. 

Type-ahead will work in the DOS menu. Just don't Binary Load 
anything into Page 6! 

A RESET won't kill the type-ahead, but using the B option from DOS 
will. Do an A  USR(1536) to recover. 

— Greg Menke 


NEWDOS 


This article by Greg Menke was inadvertently omitted from the May issue of ACE. 


One bad thing about Atari error handling is the error numbers 
instead of error messages. It is quite easy to put your own error 
handler into DOS. All you need to do is compile a JSR to your error 
routine into the error handling part of DOS. Then if DOS gets an error. 
it jumps to your routine. Obviously, any part of DOS can be modifiec 
this way. There is a problem, however. As the JSRs are hand compilec 
into DOS, this type of routine is ONLY compatible with the DOS it was 
made for. If you modify DOS like this, be sure to get an OK from the 
authors of Atari DOS before you send it anywhere. (Their address is in 
INSIDE ATARI DOS, by Bill Wilkinson.) Now, using NEWDOS. 


First, type in the program, SAVE it and RUN it. A new 
AUTORUN.SYS containing NEWDOS will be written to disk. Then 
reboot the computer. NEWDOS will load in and initialize. Then do an 
'ENTER"D;. The computer should respond with a "FILENAME 
ERROR" message and an ERROR 165. If it didn't work you typed it in 
wrong. 

This routine uses low memory, so you need a MEM.SAV file to use 
DUP. This program, besides modifying DOS, modifies part of the 
MEM.SAV handler so NEWDOS will re-initialize when you do a RUN 
CARTRIDGE from DOS. So DO NOT do any disk copying, duplicating 
or file copying, or MEM.SAV will be invalidated and DOS will crash 
when you do a RUN CARTRIDGE. If you accidentally invalidate 
MEM.SAV, reboot the computer when you are finished, don't do a RUN 
CARTRIDGE! 


Neat stuff: 
POKE 7533 ($1D6D),0 - Print error 
,1 - Don't print error 


POKE 7534 ($1D6E),0 - Normal messages 
,128 - Inverse messages 


KRAZY CLIMBER 


In this month's game by Sydney Brown, you must climb to the top of 
the building without being hit by the falling tools or other objects. You 
can climb only on the windows and you must also be careful not to fall 
of the edge of the building. 

Joystick 1 controls the climber. He will move in the direction of the 
joystick. You are allowed 2 mistakes. The third one is FATAL!! You 
Score 1 point per floor climbed and also bonus points when you reach 
the top of the building. Good luck!! 

— Sydney Brown 


ALPHABET BEE 


Alphabet Bee is a program to help pre-schoolers learn the alphabet. 
The object is to pick letters in alphabetical order and carry them to the 
hives at the right and left limits of travel. If the wrong letter is brought, 
it will return to another flower. Use a joystick in player #1 position and 
press the fire button to pick up or release the letters. If you have 
difficulty picking up the letters, you can hold the button down while 
you 'buzz' around the flower. The letters can't be released until you 
reach the limits of travel. You can restart at any time by using the 
START key. The OPTION key will toggle on and off a listing of the 
alphabet to copy. 

The program uses a number of techniques you might like to 
investigate. Horizontal scrolling is provided by installing a display list 
in page six. Action! has no trouble in changing the LMS addresses 
fast enough to scroll quite smoothly. A single line player missile 
graphics area is placed at the top eight pages of memory. The ten 
pages below this are allocated to screen data, each page holding data 
for two horizontal lines. Memory top is lowered for this 18 pages 
before a Graphics 1 command is issued. This places the text area 180 
bytes below the new memtop. The graphics 1 screen created is never 
used, but information is put in the text area which the display list has 
changed to graphics 1 lines. 

A new character set is created in the 1K area unused by the players. 
All letters are made in inverse so they blend with the flowers. Display 
list interrupts are used to change flower colors part way down the 
Screen. Text area colors are also changed with DLI's. The interrupt 
routine is placed in page six and has the ability to change two colors 
for each DLI. | found much interference between the DLI's and player 
missile graphics. In certain cases the interrupts had to be disabled as 
when the alphabet is put into the text area or when the program is 
restarted using the START key. 

Timing is largly based on waiting for the vertical blank interrupt 
(until vcount = 128). This gives the basic Speed to movement as well as 
tempo to the tune played. The notes are made to trail off in amplitude 
after the count for their duration reaches a certain value. Sound 
routines were set up so other tunes or sequences of tones could be 
added. The data for these must be transferred to the array tune1 or 
tune2,(voices 1&2), before they are activated (sndflg1 = 1). | hope study 
of the techniques used proves valuable to you. 

— Stan Ockers 


SUPERWARE GAMES 


AFTER PEARL ($20) is a world war Il simulation of the Pacific 
theater, in which every major ship is depicted. Major ships include 
crusiers, battleships, and carriers. The simulation begins with the 
bombing of Pearl Harbor, and may be playd as a 2 player simulation or 
solitaire. Units are shown as red or blue flags of the respective 
countries, thus hiding task force compositions. Points are scored by 
the number of currently controlled bases. The map displays the 
Pacific from Hawaii to China, Alaska to Australia, and is quite detailed. 
It scrolls smoothly across approximately dozen screens. 

There are various levels of play, but even on the advanced level, it is 
quite easy to win against the computer. However as a 2 player game 
this program is quite good. All player input is by joystick as you give 
orders to task forces to move. Combat occurs when task forces come 
near each other or land bases. There are a couple dozen disturbing 
misspellings of ship and base names. But this carelessness does not 
extend to the program's coding. The game is an accurate stratetgic 
simulation, and a fun game at the same time. It allows you to play a 
strategic level game in quite a bit of detail, while still requiring little 
play time. 


At first glance, DAWN OF CIVILIZATION ($11) appears a simple 
game. However, after repeated plays | find it anything but simple. The 
game may be played by up to 4 persons. The Atari will play any 
remaining position. The winner is the one with the most tribes at the 
end of the game. Players may set the length of the game from 11 to 30 
turns. Each turn a player may place a Tribe, Farm, or Legion on the 12 x 
12 play area. 

Any three Tribe symbols adjacent to an empty space produces a 
new tribe symbol. Each Tribe and Legion require the food produced by 
4 adjacent empty spaces in order to survive each turn. Each turn you 
have a growth and death cycle. The Farm symbol produces food equal 
to 2 empty spaces. The Legion symbol allows you to destroy Farms 
and protect your own areas. A player may not place Tribes or Legions 
adjacent to another player's Legion. 

This is also a good solitaire game, with the computer playing from 
1-4 positions. If there is any problem with the game it is in the limited 
graphics, and small playing area. 

— Nick Chrones 





Ruth Ellsworth Con’t 
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Zeg A(CHIT-7) HH DICHT 
178 C:SSTRING-SRIGHT 
i88 C:HT-HT41 
39H ACHT :ECOUNTER 
488 iU1-8):*BFGTN 
418 F: 


be fte je 
God PS pee 
t un CO e 
Ca CH CH OO CD < 


bäi 
Gel ba 
EI onm 


GI Ta. 
mm s 


bd PS Fé PS FS 
` "- ` DÉI " 
ss a = 


Ca 
mu 


TYPE AIDS 


The strings in Krazy Klimber by Sidney Brown contain the following 
characters (| use the convention “C-” for Control characters, "1" for 
inverse, "S-" for Shift): 

LINE 7 A$= C., C-, S-+ S- 4 H Esc-Tab 2-down arrows S-= $ d C-D 
C-F C., C-, 

LINE 7 B$ = :: C-R Esc-C-Delete 1-8 18 
$ & C-. C-, C-, 
LINE 7 D$ = C. C-X ! I? I-x ? ! C-X C. 
LINE 7 G$ = C. C-, @ I-C-. @ @ Esc-Delete Esc-C-Insert Esc-C-Insert 
LINE 7 AM$ = C., C-, right-arrow ; Q tEsc-C-Insert Esc-C-Insert B C., C., 
LINE 8 H$- @ I-C. I-S-= I-C-, 
LINE 8 S$= C-C C-G C-F C-H CH 
LINE 8 S1$= C-H C-P I+ @ I-C-, 
LINE 8 S2$= ! left-arrow ! 
LINE 8 PI$= C-P CJ C-L ) CZ C-L C-H ? ? 3-left-arrows 
LINE 8 E$= C-X $ B B Esc-C-Insert Esc-C-Insert Esc-C-Insert Esc- 
Delete Esc-Delete Esc-Delete Clear 
LINEs 305, 348, and 370 the characters are all C-, 

— J. B. 


Lal 
2 
DÉI 
Ki 
zt? 
P 
rey 
Di 
"Ë 
F 


D 
a 
" 
Wu 
n 
a 
ur 
W 
wl 
"| 
Kz; 
D 


Eed ` Ce ` fol Fu de 
d HI G CO Gë 
Sn 
e DÉI 

1 CS Hee 
vet 
P 
m 
l 
hm 
ut 
EN 
ch 
a 


dë, 
Do 
adj m 
"J 
< 
D 
Kal 


ñ WORD Tñ RF PHYMED 
: SWORD 
: RTEST 

| W5:4,F5,1,0,8 

78 C:SFIBST-SNATCHSRIGCHT 
Sp å $RIGHT 

98 HS:A,E,1,0,H 


GI nn 
LI om 
T 


Ch 
m» 


ig Ci SMORPHISMATCHSRISHT 

28 T:TYPE à WORD THAT RHYMES WHITH SHuDBD 

Gr SBHYME 

MS: SHORPH 

JM: XRIGHT 

TN:5RHYME DOES MOT RHYME HITH SHEE. TRY ACARIM. 
T: 

Te 


= 3 


SKTEST 


je demo Je jut je ` bet: ` be d 
C On uf Gi ën, CG 
Ve n dm d Um ës 


' F 
"| OO 
en 


IT ` Ven 


i : 
288 =RIGHT 

zë T:vYül DID IT! SRH¥ME RHYMES WITH SWORE. 
215 PA: Tes 

2278 J:RREEIN 

218 E: 


June Meeting 
Fume — d—thà, => z IEXQFrII 
South Eugene High 
Cafeteria 


The new MINDSET computer 
will be shown at the 
meeting. WOW!!! 


KRAZY KL I MBER by BSydnevy Browm 


i ? PRY High=& 

5 Dim ieee ,Z$1883,05615) , B$ £111, 05 C8 

e $$t51,515(51,525 (00, HSCA), 151121 ,K$ 
IHE GE GFCO) .am$ (11) 

7 aA n uet BSu: =EN SE € 

PH Se tt? Z Ed LUGco-tU.ewenepilgi":àn$- 

"gei: 0 ree 

GREEN TAKE AR Sige Oe 

$zU"g€inip]S$-UM?P 1D 422ecern:p$-45pnl 3E 

(44r | 

iff Ux-Peek(iz41t255XPeek (115) i liv-Paekt 

1483+4+756%Peek £141} 

Zü &raphirs 2:Poke 718,8:Poke 708,277: 

? HË Hiit Ge” 


— È ama Í —— I — D ze E z —- 2 — ç —- z 


Mrazy 81: pberr 

21 Poke ?52,1:? Hb:".. 
"7 PRESS BUTTON TO START 
THE GANE: Poke 5:273,8 

27 7 "PRESS HARFA] RUTTON FOR INSTRUCT 
TOMS" 


z — t — È — F — ee H — ee — 


i$ a 
s: 





24 Tf Peek(5132731-5 Then Graphics 8:ün 
to iB 

25 If Peek (53279)-6 Then 32 

28 If Peek(532733-5 Then Graphics 8:60 
to xü 

235 Geto Z5 

Zë Poke 718,8:7 " IMSTRHUCTIQNS":? 


:? "THE GRJECT OF THE GAME T5 TO CLIM 
B TO":? "THE TOP OF THE BUTLDING.":7 
11 ? "THIS IS NOT 50 EASY AS YOU MUST 
PODGE":? "THE FALLING QBJECTS.":2 “you 

CAN ONLY CLIMB UP ON THE WINDOHS.' 

32 ? :? "YOU MUST ALSO WATCH THAT YOU 

DON'T GO°:? "OFF THE EDGE OF THE BUILD 
TMG":? :? “PORT 

II 7 :? “MOVE THE JOYSTICK UP TO CLIME 

us? ug JUST PUSH SIDEWAYS TO MOVE ACRO 

55" 

14 7 "YOU SCORE 1 
RED &":Poke 752,1 
75 3 “yOu CAN'T GO BOWN. MIREGANTA 

PER :? :? "VOU ARE ALLOWED 2 MISTAKES, 
THE THIRG":?7 "IS FATAL ftir 

48 7 :? "PRESS EMET BUTTON TO START T 
HE GAME." 

38 Poke 53279,8 

3E Tf Pesk(51273) O5 Then 95 

33 7-7 

188 Graphics 21:Poke 553,46:Poke 752,1 
182 Poke 784,222:Poke 785,142:Poke 706 
,i88:Poke 787,180 

iü4 Poke 788,5:Poke 783,1I8:Poke 718,3 
z8:Poke 712,8:Poke 711,4:Poke 623,17 
186 Px-Peek(186)-15:Poke 54773,Px:Poke 
53277,2 


POINT PER FLOGR CLIM 


257, 1 
8,8: Poke 51253, 8: Poke 51768,255;:Poke 
55,188 

ke 5124B,1IB:Poke 522749, 11@: Poke 
ni258,i138:Poke 531751,158:Poke 51252,1 
74:Poke 5175z,148:Poke 51254,1858 

iz8 üx-255xPyx4512-Ux:Bx-Int(0x/756):fx 
-üx-255XEXx 

171 Poke Uxt2,üvx:Poke Uxti.Bx:Poke Ux 
4,48:Pnko Uxt5,2:Pnke Uxth, d8:Pnke Ux* 


ke ny nun 
(t bee ad 


32 
ñ 


2 


p 
s 


138 Gosub 3398:SDSub 388:F-a:Sc-a:^577 
135 Pp-2& 

198 I8-8.25:11-21:12--1; 11-1:817115:H2- 

HKH KAES HS EE KAL EE 

133 Poke 51248,Hp:P5(182,1i12)-a$ :50und 
8,8,8,8:6c-8:N-8:505ubh 348; P2t111,142? 


INS 

288 Poke 5:278,B8 

Z18 5t-5tickEtB) : If St-11 Or 5t-i8 Or 5 
t-3 Then Sound 8,21:,8,4:Hp-Hp-?:Poke 5 
iz48,Hn 

21i If $t-7 Or 51-5 Or St-& Then Sound 
8,21.8,4:Hp-Hp*t2:Poke S2248, Hp 

215 @-Peek (523756) tPeek (512571 tPeek (5:2 
SR} tPeek (522759) 

228 If St-id ånd U-@ And Int(0/71-0/2 
Then Sound 6,148.8,4:U5i:A-A-Ta:Psta.a 
*iZ)-B$;Gosub Il8:5c-Sctil/X:Goto 238 
221 If 5t-14 and Uzi And Intí0/73-0/2 
Then Sound 8,188,8,4:U-B8:0-8h- I8: PS (à-7 
,Afi21-0$:Gosub Z10;:Sr-Sr+i/I | 


234 [f A¢i@ Then i68 

278 75-p5(171,433) 

271 P5t17117,493)-75:50und 0,0,8,8 

272 HI=HitIi:Peke 512492.H1:If Hilig T 

hen Ii-i:Gosub 358 

273 Tf Hi)i68 Then Ti--i:G05ub 358 

274 H2-H2412:Poke 51258,H2:Tf H74166 T 

hen 12-i:60sub 158 

275 If H2)158 Then I2--1:G60sub 358 

276 H3-HI4II:Poke 53251,H3:3f Hiil8B T 

hen Tiri:Gasub 358 

277 If HZ>)ib5Ë Then Iz--i:Gosub Zeg 

278 Sound 8,8,8,.à 

2388 If Int(tàl-&58 and £-8 and Tü@<i Then 
I8B-2: For Wei To 7:50und 8,.21,1B.18: 
For Hw-1 To 7:Wext Ww: Sound 8,8,8,8: 

Next M 


285 If &718-Intt4/103 And Ac-i Then PZ 
p-?:6c-8 

286 If Péí15 Then Pris 

288 If ó/iBO Int(A/18) Then Ac-i 

298 If Hp'i63 Or Hp(37 Or Peek(53268)4 
?8 Then Goto z388 

238 N-N*1:1f NDP Then N-B8:Gosub I4B:P$ 
(111,1421-H85 

239 Goto 288 


6 


J38 F-Fti:Pake 51249,1:Poke 51758,1:Po0 

ke 53751,1 

igi For WA To 115 Step 2:P5(H.H*17] 
-á$:CcC-8.5:If C48 Then 5-2 

i87 sound 8,H.18,5:50und 1,H,18,6:650n 
suh IFA 

ZË 4 Next Mr Sound 8,123.8,14:5ound i, 

8,8,8:P$tH, HF91-D5: For Ww-i To 1£:HWoe 

xt Ww:*sound B.B .3 B:Tf F23 Then 38A 
ZaS For MW-iX8 To 258 Step S:PStW, HtA 
I=? epee! Noxt Ht P5tC244,2541-ün$:Poke 
785,14:Pnke 51757,1 

rah For id-288 To Z Step -i:Poke 5174 
3.,H:1f W'i8ü-Int(iW/183 And Hrd-Int thy 49} 
Then 5naund @,35,18,6:Goto 288 


i87 If W'/iü-IntiH/18) Then Sound 8.4 
3,i8,&5 

i88 If Hp?M Then Poke 53248,1 

i83 Next W:50ound 8,8,8,8:Poke 785,14 


Z:Poke 51257,8:G0zsub I78:G0to0 135 

3i8 If T3)i1 Then Return 

i28 C-C+i:If C2 Then C-8 

ixa Tf C8 Then Poke 788,6:Poke 783,12 

B:Poke 718,138 

Xii If C-1 Then Poke 788,113:Poke 

6&:Pnke 719,178 

332 If C=? Then Poke 788,.1:8:Poke 

iiB:Poke 718,6 

329 Return 

i48 An-Int tind {A #8tiy:On Rn Gate 

247, 343, 344, T45, 347,748,749 

34i H$-51$:Return 

24? M5-525:Return 

X W5-H$:Return 

X$-H$:Return 

x$-55:Beturn 

MS-PI$:Return 

xS$-"W':poke 77.8:Return 

3 X$-ES:Return 

752 Sound 8B,Rndta?X28,18,4:Return 

358 Restore i8i8: For Tzi To li:Reac 

Fr:Read De:5ound 8,Fr,ig.i8: Far Wei 

To Be:Mext Mr Sound 8,8,8,8:Nex* T 

369 Z-Z42:P-P-i:&650sub F7A: Gate 138 

378 For W-PxX75hib28 To PxX25654i1827: 
Dnks H,B:Mext H: For IEA To 494 Step 

5:50und 8,255-CWH/2),8,4:PS CH, HF A) "e 

ye 

i171 Next W:Sound 8,21,18,5:Return 

i88 For Hw-1 To 128:Poke 712,Hw:5pun 

d 8,w,18,6:50und i,Ww-1,18,8:Poke 712 

,8:Next Me 

Ji Sound 8,492,8,14:50und 1,8,8,8:C-8; 

Gosub i38 

TIEZ PS(H,Mt8)-6G2: For W-i4B8 To B Step 
-i:Sound 8,49,8,1nt(M/18) : Next H:50un 

3 8,8.8,ü 


789, 


723. 


341, 


387 Position 8,23:7? HGO:"BBBBERRBRRBBRR 
RRRBR'" 

384 ? HB; "BARABAAABRABAABAAABR":? H6;"E 
ARRRARARAARAAABABRB':7 Ho;"BARBRÓADBABÀ 
BARAAEB" 

385 7 BR: "RABARARARARERGRARBR':? Hh;"B 
ABABARABABBBABAAAB' 

TEG 7 HB:"BBRBRBBBBBBBBRBBRBRRBU:T7 Hp: mp 
FAAABABABAAABRAABBE':? HE: "BEABABABABRAR 
RBARABB'":? HE: "BRABARSARARAARBGABBR" 
I87 7 H6; "BESRARAARBARBBARABB':? HO; "RB 
SCA ARRABRAAABARABE':?7 HE: "BREBRBRRBREE 
ERBBRRR" ; 

RS iti: For W-i To 588:Mext H 

ZRF Poke 5:248.1:Pnke 53749,1: Poke 512 
58,1:Poke 522751,1:Poke 53752,1 

[38 Graphics 18:7? Bërruour scare was " 
jIntísScl:? dG:Tf Sc}High Then High-Int 
$c) 

33 


"j 


f; 


"m 





Press . 
Seeger: Poke 5377793,8 
132 Poke S2752.3:Poke 5I754.1:Ppke 237 
55,1 


S91 For MI To 58:Wext HiPake 5:273. 
Ë 
334 If Seek (537793436 Then Z34 


i95 7-2:60to 188 

së For CL To I: For H-Ë-1 To Cité 
Step f:Calor CiPlot IB.M:Prawto ZS. Mr 

Pint 4B,M:Drawto 45, 


581 Plat 5@.K:frawto 55,M 
383 Mext U:Next C:feturn 
23g Far W-PxEK75htt:84 To PxEK7565118771: 


Poke W,B: Next M 

$35 For H-PxX755t4BB To PxX?25ht435:P 
poke MH,285:Hext M 

333 Seturn 

i8i8 Bata 188.:5,1?28,20,28.17,188, 15,1 
28,78,8,15,38,15,38.15, B8, 15, 82,15, 75, 
18 





ið :Atari TYPEAHEAR bu Greg Manke. 


LI ` D, God FQ 
cw (En Gm uw 
" Jonn LII 


qu on 


` 
z 


ED "J 
m (E dx 


a 
"a 


#168 
gita 


Bi2B : 
aiza : 
NUM = Z 
8158 ; 


#148 


8i53 
BI78B 
sida 
#132 
GET 
aris 
a7?8 
#724 
GE 
8758 
B?88 
8778 
9738 
A739 
EJER 
Riig 
GESAT 
aiia 
GEE 17 
8:58 
prna 
8278 
8288 
GK 
paat 
8418 
84726 
g418 
#446 
3458 
#468 
8478 
8488 
a478 
#588 
8516 
8578 
R536 
#548 
8558 
8563 


TYRrE AHEAD 


Uses Atari Assembler/£dstar 
: format. 


"Race MUM if the character 
;Printin3 i5 erratic. 


J 


x-S5ep8a8 


PLA 
JMP 


ifs 
STÀ 
i PA 
STA 
J3R 
PTS 


START 


iz 
HOSINI+1 
is 
DOSINTIT? 
START 


START LBA HRESTARTAZES 


5T4 
Leg 
SL 
JSR 
RTS 


17 
HRFSTART/Z55 
ii 

INIT 


RESTART JSR START 
POSTNT JMP BOSINT 


LDY #0 

LOA $E4AA,Y 
TÈBLE,Y 

Hib 


ü DOME 


MOVE 

CLC 
$t4B84 
Hi 
EPTTOR*1 
$E4685 


; #8 


FRITOR+Z 


à HGETE255 


TABLE +4 
HGET #756 
TABLETS 
HTABLEE255 
$121 
HTABLE/755 
$121 


(ën ^ Eo ED DE DE E EE EE 

"pop RE A On un Om un m On gum nn oh un 
Pe eg VI ub DD "ml CD aso Ve bi ka en xd 

Gi d du mu ~ Om de do o UD Um UD Udo) UM 


n 
cl 
du 


1198 
iii 
KK 
1138 


GREG MENKE 


JHE 


CONT 


TABLE ¥#-¥+78 
EDITOR JHP EPITGR 


FLéf 


BYTE 8 


TEEGEE . BYTE B 


INDEX? 


SKIP 
B 


iow 


3 

CORT 
5fa 
374 
5T& 
St 
Lox 
LEY 
LBA 
ASE 
RTS 


D 
" 2 


.BYTE 8 
.BTTE Ë 


initialize UBI routine 


Lpa Re 
INDEER 
INDEX 
SEIP 
FLAG 
HURI/ 255 
HUBI&S5 
Hf 

$E45£ 


;Rautines hera 


D 
F 


URI LBA FLAE 


CMP 
BRE 


ë ;Get 


LEY 
CPY 
Bro 
i bó 
CL MP 
BED 
STA 
INC 
EDA 
STÀ 
AMP 


He 

HRITE 

a character 
TNDEX 
HRHFENP-RBIIFFEE 
ERTT 

764 

#255 

EXIT 

BUFFER, Y 


INDEX 
H255 


CAP A 


7há 
ERIT 


from keyboard 


:5end characters from BUFFER 
WRTTE LBA SKIF 


CHP 
BER 
DEC 


u 
l, 


“te 
oo 

ii 
X ou 


EH 
m 
m 


INC 
La 
STA 
EXIT 


Ha 

Pass 

SKIP 

EXIT 

LOY INDEX 
INDEX 


: RESET 


BUFFER, Y 
764 
INDEX? 
HHM 

SKIF 

JMP SE45F 


RESET ¿BA #8 


5TÀ 
KI: 


INDER 
INDEMZ 


ALPHABET BEE t> y 


; Alphabet Bee FƏR j-57 TO 58 GO dlistti)-6 QD filit--*i filit^-5taddon filit==+126 
; Stan Ockers 6-84 dlist(53)-65 dlist(78)-B8B dlist(71)-6 filit^-5*addon filit==+1 
; Written in Action! ic) 1381 ACs dlist(64)-96 dlist(65)-Peek(185)-1 filit^-chr-3Z2*addon filit--ti 
; ACE Newsletter, 3662 Uine Maple Dr. stcrnpage-Peek (185) filit^-7taddon filit--t127 
; Eugene, OR 37485 June 1984 $12 year FOR j-8 to 18 STEP 2 DO filit^-8*addon filit--*128 filit^-3 
D dlist(IKjt5)-scrnpage* j/2 FOR j-yt4 TO 19 
MOPHLE dlist(3X;t8)-scrnpaget j/Z DO filit--*128 filit^-i8 Op 
BYTE ARRAY dlist(72)-58588,flwpos(188),  dlist(3Xjt4)-8 RETURN 
flwchr (188) dlist(3Xj47)-128 op dlist(58)-$D6 
BYTE j,PMPage,vpos-[188J,scrnpage, dlist(z6)-$b6 PROC FlwinitO ; a field of flowers 
hpos-I81.x,y,Pickflg-[8l,colr,chr, RETURN FOR j-8 TO 188 DO 
vpos2,sel,cnt,Match- [651,p, 4, . fiwposti)-8 flwchrij)-8 OD 
dlirnt-$P1,sndcnti,sndflgi-IB], PROC Pminit{} ; player missiles FOR j-65 TO 38 60 
sndposi-[81,Maxloud-I[111,audfi-$P288, pmpage-Peek (1663418 pmbase-pmMpageX256 BO sel-Rand(98)*5 UNTIL 
audci-$P281,falloff-[51,pospnt-IB], . SetBlock(pMbaseti824,1824,) flwpostsel)-B8 AND flwpostsel-i)-8 
vcount-$b48B,audf2-5D282,audc2-502831, — Poke(54773,pMpage) Poke (559,6562) AND flwpostselti)-8 QD 
sndpos2-[80],sndflg2-I81,sndcntZ,Pflg — Poke(532277,3) Poket623,1) Dü fiwpos(sell-6tiXRand(4) UNTIL 
CARD ptr-5568,pMbase,source,dest, Poke(52248,114) Poke (704,34) flwpostsellQO flwpostsel-2) AND 
scrnbase,csptr-[571441 Poket785,46) Poke (5Z249,114) flwpostsel) O flwpos(sel+2) OD 
BYTE ARRAY beel-[0 8 216 88 112 248 Poke(53258,114) Poke(786,72) flwchrtsell-j Op 
248 248 113 19 126 126 68 68 24 8 Poke(51255,8) Poke(51257,8) FOR cnt-4 TO i03 DO 
81, bee2-[8 8 27 18 14 Ti Fi 31 RETURN IF fiwpostcnt)-8 AND flwpostcntti)-8 
142 228 126 126 68 69 24 8 81, AND flwposicnti2)-8 THEN 
wingsi-[8 8 2 5 922 5 81 82 84 PROC Csinit() ; a new character set pO fiwpostcnttiJ-6tiMRand(4) UNTIL 
8 2 42 48 28 28 8 81, wings2-I8 8 BYTE POINTER pick fiwpestcntt1) O fiwpoestcnt-1). AND 
64 168 144 64 64 168 138 74 42 8 BYTE ARRAY newchr-ra8 8 12 12 14 14 flwpostcntt1) O fiwpostcntz) Ob 
64 84 28 48 48 8 Bl,bee(ib), i5 15 24 24 68 68 126 126 255 255 flwchr(cnttil-h64 FI Op 
wingsti8),chri-[8 8 8 8 8 8 8 ñ 8 ib 16 48 48 i12 112 248 248 15 15 FOR cnt-8 TO i188 DÜ 
&1,dli-I$48 $84 $48 $06 5D1 FBD 7 7 Z £ í í 240 248 224 224 192 192 IF flwpos(Cnt))0 THEN 
SAB 585 Sep $42 $86 SES SBD FAB 128 128 255 255 126 126 68 68 24 24 x-cnt*9 g-flwpostcnt) colr-Rand(4) 
$86 $a8 SES SBR SAB 386 58D $45 24 219 38 126 126 58 24 24 24 24 74 Flwr(x,u,flwchrtcnt) ,colr) FI 0p 
$86 S68 SRD $AB $86 SES 586 FDI 24 24 24 24 24 8 ü I1 GF 127 255 255 RETURN 
$00 Son $D4 S8C FAB $DA FED 588 255 8 8 248 252 254 255 255 255 8 @ 
$p8 $68 SAA $68 $48 517 72 518 252 248 249 192 8 8 8 8 6Z 15 15 š PROC Hivepart(BYTE x,u,len) 
218 $16 32 $14 212 516 58 51A 571, 8 8B ñ 255 255 255 255 255 255] filit-scrnbaseti28Xuytx filit^-il 
tuned (66) , tunez (66), source=csptr dest-pMbase FOR j-i Tü len-2 bü 
theme-[2@ 53 28 68 48 64 MoveBlock (dest, source, 18241 filit--ti filit^-15 OD filit=-ti 
18 72 10 64 i8 68 18 72 48 Bi 18 FOR pick-pmbaset256 TO pMbaset?6z filit^-12 filit--*128-1len 
54 18 öğ 18 53 18 64 18 72 18 64 Dü pick^-255 OD FOR j-1 TO len 
ið 68 ið 72 18 64 18 68 iğ 53 18 FOR pick-pMbase*i3X8 TO pmMbasets3X8-1 PO filit--41 filit^-322 QD 
54 18 72 i8 64 16 68 18 72 28 51 pü pick^--! 255 Op RETURN 
28 68 48 64 18 72 18 64 18 68 18 FOR j=ü TO 184 
72 40 81 8 M, DO pick-pMbaset24t; pickAcnewchr(j) 00 PROC Hivedoor(Byte X,Y) 
theweb-I18 128 18 108 18 144 18 Poke (756, pmpage) filit-scrnbase*ti28Mytx filit^-ii 
i188 18 152 iü 188 18 128 18 188 48 RETURN l filitz-*i filit^-8 filit==+1 
i71 18 128 18 188 18 178 18 ið 28 filit^-i4 FOR j-i TQ 6 
162 28 128 48 121 28 188 28 128 48  ppoc DlinitüO ; insert new display list DO filit==#125 FOR cnt=1 TÜ £ 
i21 i8 128 18 188 18 144 18 188 18 rop j=0 TQ 58 pü filit--*i filit^-8 0D Op 
15? 18 108 i8 178 ið 188 48 121 18 DO Poke($688* j, diit 1))) üD RETHRMN 
i28 i18 188 28 162 8 8] Poke(512,588) Poke (51Z,5) ptr-$688 
BYTE POINTER filit Poke (54286 ,192) PROC Hive(BYTE p,q) ; draw a hive 
RETURN — Hiveparttpt3,q,33 Hivepartí(pt2,q*7,5) 
PROC Arainit() ; set up display list Hivepart(pti,qt4,7) FOR CNT-B TO 5 
FOR j-8 TO Z BA dlistCi)-112 OD PROC Flwr(BYTE x,u,chr,coir] ; a flower bd Hivepart(p,q*6*ZXcnt,93 0D 
FOR =Z TO 68 STEP 3 DO BYTE addon RETURN 
diistij1-86 00 dilist(53)-78 addon-64¥colr filit-scrnbaseti28üKytx 
dlist(B5653-1314 . filit^-I*addon filit--*i filit^-4taddon PROC ScrninitO ; draw background 


8 


CARD nus 

scrnhase-scrnpagexX256 Poke t7127,144} 
setBlock(scrnbase,2568,8) 

Poke(782,54) Poket718,1823 Poket711,68) 
Flwinit() 

Poke(556,1) Poke(657,8) 

Hivet5,2) Hivedoor tiğ, ið} 

HivetiiB,2) Hivedoor (120.18) 

RETURN 





PROC Plapartt?) 
cnt-B j-a BO 
tuneit(j!-thenmetpospnt) f 
IF ; MOD 2-8 THEN cnt--tthemetpospnt) 
FI j==+1 pospnt--ti | 


; Play part of theme 


UNTIL rcnt?-88 OD tuneiti)-theme(pospnt) ;j-Peek(i1861 Poke t1ë6, 183 


tuneif iti!l-8 Pospnt--*1 

IF paspnt-&4 THEN pospnt-B FI 
audfi-tuneiti) sndcnti-tuneitü?) 
sndposi-i sndfigi-i audci-S$á8XMaxloud 
RETURN 


PREC Plall() ; play all of theme 

FOR C8 TO 65 DO tuneiti)-thewe(t;) Op 
audfi-themeti) sndcnti-theme tg? 
sndposi-i sndflgi-i audci-$68ZMaxloud 
FOR 3-8 TO 68 DO tune2(j;)-thewebt!;3) Op 
audf2-theMwebti) sndcntz—-themeb (8) 
sndpos2-i sndflgZ-i audcZ-$68ZMaxloud 
RETURN 


PROC Grabi) ; take a letter 

x=hpos g-fiwpos(x?) chr-flwchr tx) 
filit-scrnbhaseti28Nytxt99colr-filit^ 
colr--/64 vpos2-uposti&b 
Fiwrtxt9,y,64,colr} flwchr (x1-64 
Pickflq-1 snurce-csptrttchr-32) X8 
dest-pMbaseti5ibtiupos2 
MoveBlock(dest,source,8) dest-chriti 
MoveRlock(dest,source,8) 

Plapart() Poke(77,8) 
RETURN 


PROC [etao(? ; drop a letter 

FOR izi TO 8 BO rhrit;)-8 Ob 

source-chri dest-pMbasetibi6tupos2 

Moveblock (dest, source,18} 

pickflg-8 

IF chr match THEN : back if no Match 
50 sel-Rand(938)45 UNTIL 

fiwrhrtsel)-64 DD 
flwehrfseljcchr x-sel y-fiwpostsel) 
colr-Rand(4) flwrixt9,u,chr,colr3 
ELSE Put(chr! match--ti 
IF Match-91 AND pflg-a THEN Plallt) 
pfig-i ELSE Plapart() FI FI 
RETURN 


STAN OCKERS 


PROC beti) : show/remove alphabet 
BYTE flipit-[81 

filit-(scrnpage-1)X256496 Poke ($4786, 64) 
FOR j-161 TO 186 DO 

IF flipit-8 THEN filit^- ; ELSE 
filit^-8 FI filit--*1 QD 
flipit-8 THEN flipit-i ELSE 
flipit-8 FT 

Dü UNTIL Peek(51273) ? 3 OD Poke (54286,194) 
RETURN 


IF 


IF ¢stk&23=@8 OND vpocs(i?8 THEN 
gpos--*i vpos?2--t! FI 

TF Randti6}<i THEM upns--ti 

uyposz--t1 FI 
IF Randfi6)£(! THEN vpos---i 
ypos2---i FI 

dezt-pmhasetiBZitupos 

source-wings MoveBlocktdest,source, 19? 
dest-sMbaseti288*ypoas saurce-bee 
MoveRlocktdest,source, 171 
dest-pMhasetiSsihtupos?2 source-rhri 
MoveBlocktdest,source, 181 

IF Stria(81-ü AND pickfig-@ AND 
fluchrthposi)54 AND fiwchr(hpos? (31 
AND upos?flwposthposX8t78 
AND vnaosiflwposChpos) XR XB 
THEN Grab(3 FI 

IF 5trig(8J-B8 AND pirkflg-1 AND 
thpos-8 OR hpos-iii) THEN Letgot) FI 
IF Peek(5127731-3 THEN Abetiü) FI 

IF Peekt5z77931-6 THEN Poke (54786, 64) 
EXIT FI Op OD 

RETURN 


PROC Maing 

BYTE byt,stk-$278 
INT hscr-[81 

CARD wait 


DO FOR i-@ TO if DO beetj-bhbeeit);) 09 
FOR iza TO 18 BO wings(ji-wingsiti? Ob 
Arainit() Graphics(1) Pminitt) 
Csipit(3? Scrninit(O) Pliniti? Piallft) 
source-CPeektig6)-1)X2565 
Sethlock (source, 256,83 
wmatch-65 hpos-@ vpos-i8@ pfla-8 

pü 
pü UNTIL ucount-128 DD diicnt-8 
IF sndflai-i THEN sndcnti---i 

IF sndcntiífalloff AND sndcntide 
THEN audci---i FI 
IF sndcnti-@ THEN sndposi--ti 
sndcnti-tuneitsndposi) 
IF sndcnti-8 THEM sndfigi-8 
audci-i6B ELSE sndposi--*i 
audfí-tuneitsndpnos1) 
audci-$à8 X waxloud FI FI FT 
If sndflg2-1 THEN sndcnt2---1 
IF sndcntZífalloff AND sndcnt258 
THEM audc2---1 FI 
IF sndcnt2-B8 THEN sndpos2--i1 
sndcnt2-tune2 (sndpos?1 
IF sndcnt?7-8 THEM sndflg2-8 
audcZz-i68 ELSE sndposz--ti 
audfZ-tune2 (sndpos2] 
audc2-568 X Maxloud FI FI FI 
IF tstké4)-8 AND hpos?8 THEN hscr--ti 
IF hscr-8 THEN FOR :;-4 TO 61 STEP 3 
Bü dlisti;1---1 0D hscr-ü hpos---1 FI 
FOR j;-8 Tü 16 PO beetCjl-beeitj;l OD 
FOR j;-8 Tü ig BO wings(i)-wingsit 3 ap 
Poke ($4776, hacr) FI 
IF (stk&81-8 AND hposiiii THEN hscr---i 
IF hscr--i THEM FOR i-4 TO 61 STEP Z 
BO dlist¢€si==ti OW hscr-7 hpos--41 FI 
FOR j;-8 TO 16 PO beetjl-bee2(;) Of 
FOR j-@ TO 18 DO wingstj!-wings2(;! Of 
Poket54776,hscr) FI 
IF t(stk&1)=ë AWD upos?28 THEN 
ypns---1 ypos?---1 FI 
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MX-80 Graphics Dump 
by GREG MENKE 


1 Rem JXOO00]0]09]0]0]0!0]OHOCOOOO]OOHOO]OOOOdEE 


2 Rem wa ACE NEWSLETTER KR 
£ Rem XX i662 VINE MAPLE DR KS 
4 Rem He ENGENE, GR 97485 kx 
5 Rem SR MAY 1984 512 YEAR xx 


6 Reps X33JOGOQOHEOHOOHOOGOODOOOEIOOOOHCGOOE 


78 Rem XME-88 GRAPHICS DHMPER U2. Get 
22 Rem = BY GREG MENKE 3/4/84 x* 
Tü Rem XGGOOUOQOUOHUOGOHOCOCGOHBOHOHOGQHOIOE 
i88 Dim L$í4882,409 (200 , FS (200 ,T$ C128], 
5¢5(17,05¢8) 
118 Graphics 8:5etcolor 2,12,2 
128 XoFre(@)-4896:Bim BuffS (x) 
iz8 Open Hi,6,8,"D:X,X";Trap 158 
148 Input Hi;05;:? A$,:Input #iz;as:7 AS 
:Goto 148 
158 Close Hii? :? ;? 1? "Enter file ts 
he printed. (You have":? H;" free but 
es, "j;IntiW/12523;" sectors.2" 
168 7 Input FS:If LentF2242 Then 138 
178 ? “HEnter TITLE. DAT only if no 
ne,":? :Input TS 
186 ? “When printing, should I turn o 
ff the screen?  (Y/W) 3? :Input »c$ 
185 If scSO"¥" and ScS0 "UN" Then 188 
198 7 “Kurn on your Printer/Interface 
, then hit HETH......" 
288 If Peek(531279) (26 Then 288 
238 Open H2,8,8,"P'":If Len(T$)528 Then 
? H2:? H2;15:? 42:7 22:7? H2:? HZ 
228 ? “SPress HdN4di to toad '":F$:? :? 
43 
248 If Peek (532793435 Then 218 
248 Open 21.4,4,F5:Trap 268 
258 Get Hi,4:? "&'chrS0 ; :Buf fStLent 
RufífS$2ti)y-Chro(n2:60to 258 
268 ? “Printing 'SF$:? 12 ;? 
488 Ren 
418 Rem 
428 If ScS-"Y'" Then Poke 553,8 
438 7 H2;Chr$(27);"p'':? it2 :Ch-1:1 $7" 
435 Ren 
437 Rem 
448 If ChoLen(Buff$) Then &osub 680:60 
to 548 
445 For &-1 To 58 
458 — f-üsctiBuffStCh, Ch232 :Ch-Ch*1:If C 
h^Len(BuffS) Then Gosub 688:Goto 648 
478 If 5c$-"N" Then ? "£';Chr$ta); 
488 If á-155 Then Gosub 680:7 t2:60ot 


o 448 

438 Ren 

528 Restore 1888+ñ 

538 Ren 

548 For H=1 To 8:Read &:LSQen(Q $) 


*tij-cChrSCÓ):Next H:Next 6G 

558 &osub 688:60to 448 

568 Rem 

585 End 

688 M-Len(i5):Y-8:If #2255 Then Y=i:x- 
4-256 

510 ? #7; Chr$ €273 ;"K"iChrS$ OD ; Chr$ CF} ; 


628 For &-i To LentL$3:? 12:15(5,6); 
:Next G:L$="": Return 

6:8 Rem 

611 End 


648 Close HZ:Lprint Chr$(272 ;"ü":L prin 
t Chr$Ct2) 

658 Graphics 8:5etcolor 2,12,2:Poke 77 
,8 

668 ? :? "File ';F$;" printed!" 

678 7 :7 :? ;? "Press.......," 

688 3 :? "STTS : RUM again.":? “RENAE 
fi: End." 

6398 If Peek(53279)-6 Then Cir "Run 

788 If Peekt512792 (275 Then 598 

718 ? :Clr :End 

1880 Data 8,48,128,124,67,124,1728,48 
1881 Data 8,8,8,255,255,24,24,24 

1882 Data 8,8,80,8,8,8.255,255 

1883 Data 24,24,24,248,248,80,0,8 

1884 Data 24,24,24,255,255.8,8,8 

1885 Data 24,24,24,31,31,8,8,8 

i886 Data 3,7.14,28,56.112,224,137 
1887 Data 132,224,112,56,28,14,7,: 
10808 Data 1,12,7,15,21,61,127,255 

1889 Data 8,0,8,8,15,15,15,15 

1818 Data 255,127,61,11,15,7,3,1 

1811 Pata 8,8,8,8,248,248,248,248 

1812 Data 240,248.248,248,8,8,8,8 

18131 Data 192,132,192,132,132,132.132, 
192 
1614 
i815 
1816 
181? 
1818 
1813 
1828 
1821 
1822 
1822 
1874 
1825 
1825 
1827 
1828 
1829 
1836 
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Data 
bata 
bata 
pata 
bata 
pata 
Data 
Data 
Data 
Data 
Data 
Data 
bata 
Data 
Data 
Data 
Data 


3,3,3,3,3,3, 3,3 
15,15,15,15,8,8.8,8 
8,24,24,122,182,122,24,24 
8,8,8.31,31,24,24,24 
24,24,24,24,24,24,24,24 
24,24,24,255,255,24,24,24 
6,28,62,62,62,62,78.8 
15,15,15,15,15,15,15,15 
255,255,0,8,0,8,8,8 
24,24,24,11.31,24,24,24 
24,24,24,248,248,74,24,74 
255,255,255,255,8,0,0,8 
8,8,8,248,248,24,24,24 
8,248,248,174,174,18,18,8 
@,16,48,126,126,48,16,8 
8,8,12,126,126,12,8,8 
@,16,56,124,84,16,16,8 


1831 
1832 
1835 
1834 
1835 
1836 
1837 
1038 
1833 
1848 
184i 
1842 
1843 
1844 
1845 
1846 
1847 
1848 
1849 
18058 
1851 
1852 
18531 
1854 
1855 
1856 
185? 
1058 
1853 
1868 
i861 
1852 
1863 
1854 
i865 
1866 
1867 
1888 
1869 
1878 
1871 
1872 
1873 
1874 
1875 
1875 
1877 
ie78 
1879 
1838 
1881 
1882 
1881 
i884 
1885 
18386 
1887 
1888 
1889 


pata 
Pata 
Data 
Pata 
Data 
Data 
bata 
Pata 
bata 
pata 
pata 
pata 
pata 
pata 
pata 
pata 
pata 
pata 
Data 
Data 
Data 
Data 
Data 
bata 
bata 
Data 
pata 
pata 
Data 
Data 
Pata 
Data 
Data 
pata 
bata 
bata 
pata 
Data 
pata 
Data 
Data 
Data 
bata 
Data 
pata 
Pata 
bata 
Data 
pata 
pata 
Data 
Data 
Data 
pata 
pata 
Data 
Data 
Data 
bata 


8,16,16,84,124,56,16,8 
8,8,0,8,0,0,8,8 
8,0,8,122,122,8,8,8 
8,112,112,80,8,112,112.8 
16,126,126,316,36,126,126, 36 
8,16,116,214,214,92,72,8 
8,1872,188,24,48,182,760,8 
8,12,94,242,186,236,78,18 
9,0,8,112,112,8,8,8 
8,8,8,68,126,102,55,8 
8,66,182,126,08,8,8.8 
15,84,124,55,56,124,84,16 
8,16,16,124,124,15,16,8 
8,8,1,7,5.0,8,8 
@,16,16,16,16,16,16,8 
8,8,8,6,6,8,8,8 
8,6,12,24,48,26,64.8 
8,68,126,74,82,126,60.8 
8,2,14,126,126,2,2,8 
8,14,182,78,28,114,34,8 
8,68,78,82,122,118,68,ü 
@,12,28,52,126,126,4.8 
8,116,118,82,82,94,76,8 
8,60,126,82,82,94,12,8 
8,64,78,78,88,112,36,8 
8,44.126,82,82,126,44,8 
8,22,114,82,86,124,56,8 
8,0,0,54,54,0,0,8 
8,8,1,55,54,0,8,8 
8,0,16,56,188,198,138,8 
a, 36, 36,36, 36, 30, 16,8 
8.128,1328,188,56,16,8,8 
8,12,96,74,98,112,32,8 
8,68,126,66,38,127,58,8 
8,108,562,1880,168,62,10,8 
8,126,126,82,82.126,44,8 
8,58,126,66, 56,182. 16,8 
8.126,126,66,182,68,24,8 
@,126,126,87,82,82,66,8 
$,126.126,80,80,80,64,8 
8,58,126,65,.74,78,78,8 
8.126,126,16,16,126,126,8 
8.65.65,126,126,06,66,8 
8,4,6,2,2,126,124,8 
8,126,126,24,68,1872,65,0 
0,126,125.2,2,2,2.8 
8,126,126,48,24,48.126,126 
8,126,126.56,28,126,176,8 
0,68,126,66,65,126,60,8 
8,126,126,72,72,128,48,8 
8,58,126,66,68,126,58,8 
8,126,126,72,76,126,58,8 
8,32,114,82,82,94,12,0 
8,64,64,126,126,64.64,0 
@,126,126,2,2,126,126,8 
8,128,124,6,6,124, 128,8 
8,126,126,12.24,12,126,176 
8,182,126.24,24,126,182,8 
8,96,112,38,38,112,36,8 


1838 pata 
1891 Data 
1832 Data 
1893 Data 
1854 Data 
1835 bata 
i895 Data 
1857 Data 
i838 Data 
i899 Data 
1188 Data 
1181 Data 
1182 Data 
1183 bata 
1184 bata 
1185 bata 
1166 bata 
1187 Data 
1188 Data 
1183 Data 
1118 bata 
iili bata 
1112 bata 
1113 Data 
1114 Data 
1115 bata 
1116 bata 
1117 Data 
1118 Data 
1113 pata 
1128 Data 
1121 bata 
1122 bata 
112i bata 
1i24 Data 
1125 Data 
1126 Data 
1127 Data 
1128 Data 
287 
1123 
11:8 
lisi 
1137 
1133 
255 
1134 
š 
1145 
2 
1136 
6 
1137 
248 
1138 Data 
4 

1123 Data 
1148 bata 
1141 Data 


Pata 
bata 
Data 
bata 
bata 
Data 
Data 
Data 


Data 


8,78,78,38.114,38,56.8 
8,8,0.126,126,56,65,8 
8,36,48,24,172,6,2,8 
8,66,56,126,125,8,8,8 
8,8,24,48,36,48,24,8 
2,2,2,2,2,212:.2 
8.24,68,126,126,68,24,8 
8,4,46,42,42,62,18,8 
8,126,126,18,1:8,:8,12,0 
8,28,62,14,14,34,8,8 
8,12,38,18,18,126,126,8 
8,28,62,42,42,58,24,8 
8,8,16,62,126,80,88,8 
8.25,61,317,17,061,52,8 
8,126.125,15,15,38,14,ü 
8,8,18,94,354,2,8,8 
8,8,1,1,1,95,94,8 
8,126,125,8,28,722,2,0 
8,8,66,126,126,2,8,8 
8,62,62,24,28,56,62, 38 
8,62,62,12,12,62,10,8 
8,28,62,34,34,62,28,6 
8,63,62,36,35,68,74,8 
@,24,680,36,36,62,63,8 
6,62,62,37,32,48,16,8 
8,18,58,42,42,46, 35,8 
8.32.32,124,126,34,24,8 
6,68,62,7,7,62,67.8 
&,56,60.6,6,68,56,8 
8,56.52,14.,28,14,62,56 
8,324,54,26.28,54, 14,8 
8.57.51,5,7.62,60,8 
8,34,38,46,58,56.34.8 
#,24,58,126,126.58,24.8 
0,8.8,255,255,8,8,8 
8,124,124,112,120,94,78,.8 
8,16.56.124,254,8,0,6 
8,8,8,254,124,56,16,8 
295,287,135,131,191,1231,135, 


295,255,255,8,80,231,231,231 
255,255,255.255,255,255,8,8 
211,231,231,7,7,255,255,255 
211.231,211,8,8,255,255,255 
211,231.231,224,224,255,255, 
292,248,241.227,1993,1431,11,5 
851,31,141,193,227,241,248,25 
254,252,248,248,224,132,128, 
2955,255,255,255,248,248,748, 
6,128,132,274,240,748,252,25 
255,255,255,255,15,15,15,15 


15,15,15,15,255,255,255,255 
62,63,63,63,63,63,63,63 


1285 
129 
1285 
£55 
izB? 
255 
i288 
2598 
1287 
255 
i218 
255 
1211 
255 
1212 
255 
1211 
255 
1214 
259 
i215 
123 
1216 
255 
i217 
255 
i218 
295 
12192 
£35 
i228 
2955 
iz21 
255 
1222 
247 
1222 
2545 
1224 
255 
12295 
255 
i226 
295 
1227 
255 
1228 
295 
i229 
255 
1218 
255 
izii 
2955 
1232 
255 
12313 
255 


Data 


Data 


Data 


Data 


Data 


Data 


Data 


Data 


Data 


Data 


bata 


bata 


pata 


bata 


Data 


Data 


Data 


Data 


Data 


Data 


Data 


bata 


Data 


bata 


bata 


Bata 


Data 


Data 


Data 


252,123,122,287,211,287,179, 
255,122,129,199,227,129,129, 
295,1935,123,182,183,123,195, 
299.122,122,183,1831,125,287, 
255,125,122.183,187,129,197. 
295,1293,122,181,173,1732.205, 
295,221,141.171.173,161,241, 
255,151,191,122,125,191,191, 
255 ,129,129,253,253,129,129, 
2955,135,111,243,249,1231,125, 
299,123,123,241,231,2431,123. 
295,151,129,211,231,129,151, 
295,152,143,225,225,1431,159, 
255,185,177,165,141,157,189, 
259,255,255,1279,129,189,184, 
255,159, 287,231,243,249.252. 
259,189,183,129,123,255,255, 
295,247,231,287,153,287.211, 
2951,253.2531,2531,251,251,251, 
255,231,135.123,129,195,211, 
2925,251,289,211,2131,1921,225, 
255,123,129,217,217,225.241. 
295,227,1931,221.221,221,255, 
295,241,225,237,217,129,129. 
295,227.1331,213,213.197,211, 
293,255,232,191,122,175,175, 
255,238,194,218,218,1272,137, 
295,129.123,219.213,225,241. 


255,255.237,161,161,251,255, 
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1142 
252 
i141 
255 
1144 
241i 
1145 
234 
ii4b 
231 
1i47 
1148 
258 
1143 
248 
1158 
1151 


GK: 
£ < 


1152 
1151 
1i54 
1i55 
1156 
z55 
i157 
255 
1158 
255 
1159 
255 
1168 
255 
iibi 
235 
1152 
255 
1163 
213 
4164 


1165 
255 
1155 
1187 
258 
1168 
Zon 
1155 
z55 
1i78 
219 
1171 
255 
1122 
255 
1173 
2985 
1174 
255 


bata 


Data 


Data 


Pata 


bata 


Data 
Data 


Data 


bata 
bata 


Data 


bata 


bata 


bata 


bata 


bata 


bata 


Data 


bata 


Data 


Data 


Data 


Data 


bata 


bata 
Data 


Data 


bata 


Data 


bata 


bata 


Data 


Data 


292,252,252,252,252,252,.252, 
248,248.,248,748,255,255,255, 
295,2321,231,132,152,123,211, 
252,299,255,224,224,211,211, 


211,231,231,231,231,231,211, 


231,211,211,8,8,2:1,2:1,271 
299,227,195.191,1921,192,277, 
248,748.240.2480.248,2480,248, 


8,8,255,255,255,255,255,255 
231,231,231,224,224,231,211, 


231,231,231,7,7,231,231,211 


8,0,0,8,255,2535,255,255 
255,255,255,7,7,2311,231,.221 
2955,7,7,81,81,245,245,255 
295,212,787,129,123,287,213, 
2959,247.241,122,123,242,247, 
29525,213,193,121,171,213,213, 
2925,233,239.171,111,192,219, 
295.255,259,255,755,7255,255, 
293,255,255,131,111,755,255, 
255,143,143, 255, 255,443,143, 
213,129,129,219,219,129,12?, 
2255,219,132,41,41,153,181,25 


255,152,147,231,287,153, 185, 


2955,241,161,15,63.13,177,745 
295,255,235.141,141,255,255, 


£35,255,255,195,1279,1593,189, 


255,183,151,122,195,255,255, 


212,171,111,133,133,111,171, 


283,239,219,111,111.233,215, 


2955,255,254,248,249,255,755, 


2955,239,219,213,219,219,219, 


255,259,255,249.749,255.755, 


! bi ` ken ` Fäi de 
be Q1 e C5 im 
Mis n^ "d 


Qu J 


Pata 


ë Data 


bata 


bata 


i Pats 


i Pats 


Data 


Gata Z: 


bata 


255,249,243 .231,287,159,i131, 


255,135,123,151,171,1232,135. 


255,253 ,221,127,129,253,25!, 


255,221,153,177,165.141,271, 


255,1387.185,173,1321,145,187. 


258, 743,227,203 .129.125,251. 


255,139,137.173,173.161,173. 


255.195,1293,173,171,161.241. 


255,1931,185,177,167,142,155, 


285,211,129,173.174.123,211. 


255,2232,141,171,159,1:1,135, 
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,255,255,281,781,255,255, 


255,255,254,288,281,255,255, 


255,299,219,1953,142,57,125.2 
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255,223.152,181,.165.143,2721, 


2755,135,122,183.155,13:.13/, 


255.231,195,1592,151,1253,153, 


| 255,129.129,173,1731,129,211, 
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255,255,254,254.254,.168.151. 


255.122,129,247,227,233.2541, 


255,255,183,122,1729,253,255, 


255,131,193,221,227,1993,1935, 


255,193,191,223,221,193,225, 


255,227.133,221,221,133,.27/. 


255,132.192,2192,213.135,231. 


255,231.195,219,213,192,127, 


255,133,193,221,2231,207,233, 


255,2127,197,212,211,283,713. 


255,223,221,111,129.221.271, 


255,195,1921,251,2531,193,131, 


255,132,195,242,243,135,19235, 


255,199,193, 241,227,242 492. 


255,221,201,227,227.281.221, 


255,198.154,258,248,1?3,1325. 


255,221,217,282,137,285.221, 


255,231,197,123,123,197,211. 


255,235,255,8,8.255,225.255 
255,131,131.143,135.161,177, 


255,239,139,131,1,255,255,25 


255.255,255,1,131.133,2123.25 


vc 
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REM % FLASHING NUMBERS x= 

REM * HRITIEM BY * 

REM * CHRIS SIMERAL x 

REM * 54 E. WHITE TERRACE * 

REM X NUTLEY, NJ 87118 * 

REH KENNEN 

i8 DIM à$(1) 

13 DIM N(281 

i4 ? WR" OUT OF '";NG;" CONSEC. RIGHT 
-":Cg:? " PRESS RETURN TO START"; : INPU 
T ad 

15 GRAPHICS 6 

28 ATINTC9999994RND C12 t1) 

21 REM TG MAKE à LARGER GR SMALLER RUN 
BER CHANGE THE NUMBER OF 3'5 AND 1'5 I 
N LINES 28 GHD I8 

38 IF A<iiiii1 THEN 28 

48 NG-NGti:FOR Hoi TO GR:NEHT N:POSITI 
ON 9,18;7? " WI: 

41 REM Tü SPEED UP THE FLASH CHANGE LI 
NE 48 TO READ FOR H-1 Tü 58 OR 48 ETC. 
58 FOR Izi TG 16@:MEXT I:60T0 66 

68 GRAPHICS 8:7? "ENTER THE NUMBER YOU 

Saw: TRAP GB: INPUT WN: TRAP 48886 

65 IF Wra THEN ? "RIGHT" :CR-CRt1:NR-HR 
ti:G0T0 i4 

78 IF WO À THEN 7 “WRONG. 
CR-8:GO0TG 14 

75 GOTO 68 


ct gi A t4 hs M m 


IF Mon “jÀ: 


TYFEAHEAD by 


MENKE  con^t 
4i4@ JAP ERIT 
i158 ; 
ii&8 "Gert routine here 
117808 : 
1i#8 GET NOF 
1i38 PHA 
1708 LBA Hi 
i2i8R STA FLAE 
i778 PLA 
1774 ISR EPITUR 
iz48 PHA 
i758 LBA HB 
1788 STA FLAG 
1278 PLA 
1288 RTS 
i298 BUFFER - 1821 
i320 BHFENB = ii5i1 


TYING SOME LOOSE ENDS 
by Ruth Ellsworth 


The ability to use strings in a 
computer language makes it possible to do 
all sorts of things with uords Or 
combinations of words and numbers. In 
PILOT these abilities are increased and 
easily used through the use of the MS: or 
Match String command. 

Simple string variables are created 
by assigning a varíable name after the $ 
symbol. These storage files or shelves 
can then be called and used within a 
computer program (see the Dec/Jan. 1984 
ACE. NEWSLETTER). 

"Concatenating" 
in PILOT makes it possible 
string from two or more strings. For 
example, in a program to make compound 
words, C: $NEUUORD-$UORDONES$UORDTUO uould 
create a single compound word. 

Associated string values make rt 
possible to pass values in PILOT from one 


(combining) strings 
to create new 


string to another (see the Dec/Jan. 1983 
ACE NEWSLETTER). Thus, $ONE=TWO and 
$TWO=THREE will make $$ONE=THREE. 
Probably the most powerful string 
tool is the MS: or Match String command 


in PILOT. Using the MS: command one can 
breēakia string'"down and tse the parts - of 
a string in a program. The MS: command 
breaks the string into three parts; 
$LEFT, $MATCH, and $RIGHT. The RHYME 
TYME program at the end of this article 
illustrates the simple use of the MS: 
command. Line 60 of this program uses 
the MS: command to match the vowels in 
$WORD. If one were to stop the program 
at that point and type 
T: $LEFT,$RIGHT,$MATCH; the vowel matched 
would be $MATCH, the consonants before 
the vowel would appear as $LEFT, and the 
reminder of $WORD would appear as $RIGHT. 

I have only used *TEST twice in this 


Program because ue found that most of the 
words the children were using only needed 
to be checked for vowels twice to produce 
a good morphograph for rhyming. The 
*TEST module could be repeated as often 
as desired but will not produce the 
desired result if tuo vouels appear 
together because only the last vowel 
matched becomes $MATCH as the program is 
written. (The technique used to peel the 
letter off a string one at a time will be 
discussed in a separate article.) 


In order to use $RIGHT in *TEST, 
$RIGHT must be placed in the internal 
accept buf fer with the $= command. 


$RIGHT is then matched. If $RIGHT has no 


match there vas no vowel in $RIGHT, and 
$MORPH becomes $FIRST. $MORPH is creased 
by concatenating $MATCH$RIGHT from the 
last $RIGHT that contains a vowel after 


two matches. 
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Parsing (separating) strings is 
easily done in PILOT through the use of 
the MS: command if one places a separator 


in the string matched. Any character can 
be used as the separator. I have chosen 
to use a comma in the SAVECHR module at 
the end of this article because commas 
have to be inserted to save a list of 
strings under a filename. The SAVECHR 
module may be substituted Tor the 
URITE:D: lines in last month's CHARACTER 
MAKER, and the RETRCHR module may be 
substituted for the CHARACTER RETRIEVAL 
ROUTINE. The advantage to using SAVECHR 
is that one may save any character 
generated by the CHARACTER mAKER under 
any chosen name. Be sure to type 
D:filename. D: could have been placed in 
the program as a string, such as $D=D: 
and then matched, but would have added 
unnecessary length to the listing. 
Because it is possible in PILOT to pass 
numerical values to string; the values 
generated in the CHARACTER MAKER are 
converted into strings so that they may 
be saved and easily retrieved under 
$FILENAME. 
RETRCHR 
values saved 


routine reads 
under $FILENAME ($STRING). 
$STRING is then placed in the accept 
buffer to be used in the program. The 
comma is matched in Line 280 by using the 
vertical line before the comma. Line 70 
could have read C:$A=#A,$B=#B,etc., but 
my machine freezes when RETRCHR is run 
with that listing. The values are 
received and usable after system reset is 
used. If you are very short on K or 
really hate typing, you may try that 
listing before you run the program in 
which the values are to be used. 

$STRING is matched to the first 
comma, the value of $RIGHT is passed to 
$STRING in Line 370 and the match is 
repeated. A counter keeps track of each 
time the string is matched and each $LEFT 
is assigned a numeric variable according 


the string 


to the number of the counter. Though 
ecologically unsound, one could think of 
the process as being like stripping 


leaves off a tree branch. As each leaf 
is removed it is assigned a numeric 
variable and discarded while the 


are renamed ($STRING). 
it. is left adn 


remaining leaves 
Uhen the last leaf remains, 


the $RIGHT file and given a numeric 
variable. In this case we knew how many 
string variables we were going to 
encounter and could use a counter to 
determine the end of our routine. If the 
number of variables is not knoun, one 
could use non print characters to match 
the blanks which surround springs in 
PILOT. The important thing to remember 
is using this technique is to keep the 
part of the String to be used the same 
throughout the routine. if one is 
discarding $LEFT with each pass, one must 
rename $RIGHT and reuse it unless one 


wants undesirable results 


ERACE DISK UPDATE 


Erace disks 6 and 7 are now ready. We want to give special thanks 
to John R. Kelley for his contributions. All of disk 6 is a collection of 
programs he has sent us. We also want to thank the members of the 
New South Wales group who sent us some of their work. The first 
seven programs of disk 7 are from them. 


Following is a list of the programs on the two disks. 


ERACE DISK #6 
WORLDCAP —A text quiz asking you to name the capitals of the 
countries of the world. 


FRACTION — Provide two fractions and the program will add, subtract, 
multiply or divde them and show you the reduced form. 


HANGMAN.REV—An expanded hangman game with 310 words in- 
cluded. 


GEOCENTE State Geographic Centers. See how many states you 
can identify by the cities or towns near their geographic centers. 


DOMINOS —Solve arithmetic problems based on the spots on the 
dominos. This drill is good for 6-9 year olds. 


DICEMATH—This drill uses dice to set up arithmetic problems. It is 
similar to Dominos, but the problems are easier. 


YATCC—A game of chance to help teach logic patterns. It is based on 
the dice game Yahtzee. 


SCRIPTURE—A quiz to test your knowledge of biblical events, places 
and persons. 


ALGEDRIL — Drills and timed tests on basic algebra. There are four dif- 
ferent types of problems. 


AREAS.REV — This program will give the area or volume of a chosen 
shape when you give the needed dimentions. 


ERACE DISK #7 


SUMS.BAS—A simple program for addition, subtraction and 
multiplication. 


POLYGON.BAS—draws polygons based on the number of sides and 
side length the user provides. 


The next six math programs use the same format for presenting pro- 
blems. Each will guide you through the type of problem indicated by 
the title of the program, correctiong and rewarding you as you work 
each step of a problem. These are very good programs for students 
learning how to work a particular type of problem. There are several 
levels in each program. 

DIVISION.BAS 

MULTIPLY.BAS 

SUMS2.BAS— Addition. 

IMPFRACT.BAS—Improper fractions. 

EQUFRACT.BAS— Equivalent fractions. 

ADDFRACT.BAS —Add and reduce fractions. 
DICEPROB.ACE — Work out probability tables on dice throws using 2 
die. Has printer option. 

DICEROLL —Use 2 or 3 die to produce probability tables. It is similar 
to the above program, but produces a distribution table when it is 
done. 

ABSTRACT —Given clues by the computer, you must determine an 
unknown 3 digit number. Similar to master mind. Good logic builder. 


TARGETS 


A NUMBER GAME 

TARGETS (Sunburst Communications, $40) is a number game for 
ages 8 to adult. It designed to provide practice and creative application 
of basic math facts. This program is not designed to teach basic math 
facts, and could easily frustrate an individual not fluent in either 
addition, subtraction or multiplication and division. 

Game options do allow a child to perform only addition, or only 
addition and subtraction, or a combination of addition (Level I), 
subtraction (Level Il), multiplication and division (lll). Clear, concise 
instructions included on the program allow a child to easily choose 
one of the above math functions. Then, the child is given the choice of 
either choosing the target number from 1-99 (the answer), or choosing 
two numbers from 1 - 9 and having the computer select the target. 
Next the child must combine the two numbers (utilizing the selected 
operations) to reach the target number. Thus, a child can practic basic 
operations. 

Immediate feedback is given regarding how many steps it takes to 
reach a target. This becomes a challenge to create the shortest steps 
to achieve a target. Because one is able to erase the last number or 
sign entered, or restart the problem, it is possible to test out possible 
solutions. In some cases it is impossible to reach the target with the 
given combination of numbers. A response of “impossible” is also an 
option. 

There are also 30 championship games at each of the 3 program 
levels. The computer maintains an ongoing record of the name and 
number of steps of the “champion” of each game. 

If a child solves the problem in fewer steps than the champion of 
record, she or he becomes the new champion. The teacher has the 
option of having the computer display, or not display the solutions to 
championship problems. 

This program is flexible enough for Miles, a six-year-old, to use. We 
selected low target numbers, and used only the addition and 
subtraction levels. Further, it is designed to provide stimulating, 
creative challenge to the student who has mastered basic 
computation facts. This should not be considered a game, but rather, a 
mind-expanding program requiring concentrated application of basic 
math skills combined with systematic goal-directed problem solving. 
—Alice Miles Erickson Miles Erickson 


14 


MODE MIXER 


MODE MIXER (Xlent Software, Box 5228, Springfield, VA 22150, $20) 
contains three programs for beginners and advanced programmers 
who want to mix graphics modes on the Atari screen. The opening 
menu presents 4 choices: 1.) Mode Mixer 1; 2. M M 1 Demo; 3.) Mode 
Mixer 2; and 4.) Battle Stations. 

Mode Mixer 1 is a display list editor for Graphics modes 0-11 within 
an easy to understand menu. The MM 1 menu offers 8 OPTIONS, 4 of 
which will be used most often. The Create Screen Option gives you 
step input questions until you've filled 192 scan lines with whatever 
modes fit. The program shows how many scan lines remain after each 
input. 

The User's Screen shows how the screen will be arranged. If you 
don't like something, you must go back and start over again. The Save 
to disk Option translates what you have done into BASIC statements. 
The Get Printed Copy Option prints the BASIC statements (if you have 
a printer). 

You do have to remember to put the POKE statements into the right 
places in your program. The documentation shows you how to do this 
in a step-by-step example program. | was unable to get the Demo 
program to work on the disk | reviewed. 

Mode Mixer 2 is a more advanced version of the editor. It requires 
more knowledge of scan lines and RAM, but it allows you to use more 
powerful features of the Atari. The extra Graphics modes include the 
Antic modes, multicolored texts and 4-color hi-res graphics (referred 
to as Graphics 12-16). 

I'm sure you can see how this disk might save you a lot of time by 
not having to write the code for these routines, giving you more time 
to do things requiring more thought. M M 2 has no menu. It has a chart 
from which to make your choices, including the extra Antic modes. 
You will probably need a piece of scratch paper to figure out how 
many scan lines your new display will require. This is the hardest part 
of the program. A particularly nice feature allows you to automatically 
POKE memory past a 2k boundary when using Graphics 7 or 8 (for 
example). The program will also trace how much memory will be 
required for each graphics mode chosen. 

Battle Stations lets you see what a good combination of graphic 
modes can do. This is a computer version of the game Battleship. The 
computer comes up with 2 grids where the players palce ships in rows 
and columns. There is a Graphics mode 7 screen in the middle 
showing 5 ships for the players. Each time one hits a part of the other 
player's ship, there is an explosion, part of the ship disappears, and a 
red dot appears on the other player's grid. A miss makes a sound like 
something falling into water and a blue dot appears. Once all of one 
player's ships are destroyed, a ship sails across the screen with the 
words “YOU WIN”. 

| think just for the game alone the price is right. But you don’t buy it 
for a game. This is a utility which will save you time and money. | 
believe this program will pay for itself each time you use it. Xlent 
Software did a good job of documentation, but the packaging leaves 
something to be desired. It is a well put together package for anyone 
wanting to put more graphics modes on the screen. 

— Randy Cline 





FUN WITH ART 


(reprinted from the Fresno Atari Computer Sector newsletter, April’84) 

FUN WITH ART (Epyx Software, $40, cartridge) is an excellent pro- 
gram with a great many capabilities for drawing. Not only is it power- 
. ful, but it's easy to use and on cartridge. After reading about this pro- 
gram and seeing some drawings created with it in ANTIC Magazine, | 
was eager to try it out for myself. 

FUN WITH ART is a real joy to use, like all Epyx programs. Though 
the manual is only a few pages long and vague in its coverage of the 


GIVE YOUR OLD ATARI A SHOT... 


(in the arm) 
It was very lonely back in 1980 when I purchased my Atari 800. There 


were some computer buddies out there when | purchased my disk 
drive in 1981. l've been very happy with the unit but times change. My 
first indication. of trouble with my system was this last Christmas 
when | received Loderunner by Broderbund as a gift. When | was 
finally able to load it after many tries, it would do everything but play. 
As soon as l began play it locked up. 


| took the disk over to a friend who has a newer system and he 


booted it right up and began to play with no problem. So What's wrong 
with mine??? My computer still had the CTIA chip and revision “a” 
operating system (the OS board itself said rev “b” and my 810 didn't 
contain a data separator board. 


| fixed my computer problems for about $70 by purchasing 3 boards 


from : American TV Sales & Service, 1988 Washington Ave., San 
Leandro, CA 94577, (415) 352-3787. | purchased a REV "B" OS board 
(had REV "E" on it) à CPU board with a GTIA chip and a data separator 
board for my 810. 


WHAT A DIFFERENCE!!! If you still have the old boards in your 800, 


I strongly recommend you purchase these new boards. 


To determine if you have the old OS board type "PRINT 


PEEK(58383)”. If the result is 56 then you have the old revision, 0 and 
you have the new one. 


If you still have the box your 810 came in you can check it and see if 


it had a "DS" sticker on it. If so, then you have the data separator 
board. If you don't have the box you must check your 810 (the boards 
started being installed in early 1982). To check it you must remove the 
top of the 810 by removing the round tape covers from the 4 
indentations in the top of the case and unscrewing the screws which 
lie underneath. When you remove the top you can see the 810 side 
board sitting vertically along the left side of the drive. There is a metal 
shield covering the middle of the side board. You must determine if 
there is a second board "piggybacked" on to the side board inside the 
shield. This may require you to remove the disk drive from the bottom 
of the case. The board, if there, is the data separator board and you 
don't need one. If there is not a second board inside the shield then by 
all means get one. It dramatically improves the drive's performance. If 
you do purchase the data separator board then be sure you bend the 
soldering connections on the underside of the board flat or they may 
hit the top of some IC's on the 810 side board which may block you 
from plugging in the DS board completely. If, after installing the board, 
you note that the drive only runs for about 1 sec (instead of about 3 
now) when you turn it on then you don't have the DS board plugged 
into the 810 board completely. DON’T try running a disk in the drive if 
that is the case because you'll damage the disk. 
The parts come with excellent installation instructions. Again, if you 
still have the old board do yourself a big favor and purchase these 
- boards!!! 


features, the program is easily learned once the user works with it for 


a short time. Two thirds of the screen fills with a menu of icons (pic- 
ture symbols). Below the menu area is a command window showing 
the commands available to the user. After studying the screen for a 
few minutes and reading the small instruction book, | am ready to go. | 
plug in the joystick and move the cursor around to the different icons. 
As | move the window indicated the choice under the cursor. 


Well, let's see. | want to draw. So | pick the draw symbol on the far 
left. Now I’m ready to choose a color from the four colors shown at the 
bottom of the menu area. | can also choose to draw a color over or 
under another color. There is also a function to alter a color on the 


screen by using a display list interrupt. This is easily done by putting 


the cursor on the screen where the color change should start, then hit- 
ting the START key to move from the picture screen to the menu 
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— Steve Berg 





screen. Next hitting the OPTION or SELECT key will change color and 
shade. To return to the picture screen, hit the START key again. The 
color should be changed from the cursor position down. This feature 
allows the user to put more colors on the screen than most people 
could ever dream imaginable. Just think, four colors on one line with 
the capabilities of putting two color changes at least one horizontal 
line apart. There are 24 design modes available with 128 colors from 
which to choose. Whew!! It takes a little time to take advantage of all 
this power in a drawing program. 

Once you get used to these features you'll find yourself creating 
some very sophisticated drawings which you can load into your own 
BASIC programs using the listing ! provide. This listing corrects the 
one provided with the Fun With Art program. Just run the program and 
type in the name of the picture file you wish to load. My listing also 
supports cassette picture storage, as well as disk storage. There is 
even a block storage feature which makes it easy to create screens 
full of graphics which can later be used to create future drawings. 

All in all FUN WITH ART is the most impressive graphics drawing 
program for the ATARI computer l've seen. The best thing about the 
program is its cartridge form, a real plus for all the cassette system 
owners. So, if you like to draw or need a graphics program for your pro- 
gramming needs, FUN WITH ART is something you should seriously 
consider. 


President— 


Atari Computer Enthusiasts 


A.C.E. is an independent, non-profit and tax exempt computer club 
and user's group with no connection to the Atari Company, a division 
of Warner Communication Company. We are a group interested in 
educating our members in the use of the Atari Computer and in giving 
the latest News, Reviews and Rumors. 


All our articles, reviews and programs come from you, our members. 


Our membership is world-wide; membership fees include the A.C.E. 
Newsletter. Dues are $12 a year for U.S., and $22 a year Overseas Air- 
mail and include about 10 issues a year of the ACE Newsletter. 
Subscription Dep't: 3662 Vine Maple Dr., Eugene, OR 97405. 


Kirt Stockwell, 
503-689-5355 


4325 Sean , Eugene, OR 97402 


Vice Pres— Larry Gold, 1927 McLean Blvd., Eugene, Or 97405 


503-686-1490 


Secretary— Bruce Ebling, 1501 River Loop #1, Eugene, OR 97404 


503-688-6872 


Librarian— Ron and Aaron Ness, 374 Blackfoot, Eugene, Or 97404 


(503)689-7106. 


Editors— Mike Dunn, 3662 Vine Maple Dr., Eugene, Or 97405 
503-344-6193 


Jim Bumpas, 4405 Dillard Rd. Eugene, Or 97405 


503-484-9925 
E.R.A.C.E. (Education SIG Editor)-Ali Erickson, 295 Foxtail Dr., Eugene, 


OR 97405 /503-687-1133 


E.R.A.C.E. Corresponding Secretary-Robert Browning, 90 W. Myoak, 


Eugene, OR 97404 (503)689-1513. 


Send 50c stamps or coin ($1 overseas) to the Ness' for the new, up- 
dated ACE Library List —new in May 84 ! 


Best of ACE books 


Volume 1 contains bound issues of the ACE Newsletter from the first 


issue, Oct 81 to June of 1982 


Volume 2 covers July 1982 to June 1983 


Only $12 each ($2 extra for Airmail). Available only from: 


George Suetsugu 
45-602 Apuapu St 


Kanoehe, HI 96744 


SortFinder 1.2 


A composite index of Atari related articles from 5 popular computer 
periodicals from Apr '81 to June '83, including ACE. Only $6 for ACE 


member from: 


Jim Carr, Valley Soft 


2660 S.W. DeArmond 


Corvallis, OR 97333 
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TYPESETTING 
FROM YOUR COMPUTER 


ATARI OWNERS: If you have a modem, text editor, and com- 
munications program to send ASCII files, you should consider 
the improved readability and cost savings provided by 
TYPESETTING your program documentation, manuscript, 
newsletter, or other lengthy text instead of just reproducing it 
from line printer or daisy-wheel output. Computer typesetting 
by telephone offers you high quality, space-saving copy that 
creates the professional image you want! Hundreds of type 
styles to choose from with 8 styles and 12 sizes “on line” 
And it’s easy to encode your copy with the few typesetting 
commands you need. 


COMPLETE CONFIDENTIALITY GUARANTEED 
— Bonded for your protection — 
PUBLICATION DESIGN, EDITING, & PRODUCTION 


Editing & Design Services 
lg. ` 
30 East 13th Avenue Eugene, Oregon 97401 
Phone 503/683-2657 





Bulletin Board 

(503) 343-4352 
On line 24 hours a day, except for servicing and updating. Consists of 
a Tara equipped 48K Atari 400 with a TARA keyboard, 2 double-density 
double sided disk drives with an ATR 8000 interface, 2- 8" double 
density disk drives, an Epson MX80 printer, a Hayes SmartModem; 
running the ARMUDIC Bulletin Board software written by Frank L. Hu- 
band, 1206 N. Stafford St., Arlington, VA 22201. See the Nov '82 issue 
for complete details. 


